home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / AZTECW.DIR / 01704_Script_Government < prev    next >
Text File  |  1995-09-12  |  8KB  |  297 lines
  1. global gQuest, gBeenClicked
  2.  
  3. on AGovtRollovers1
  4.   set gBeenClicked = 0
  5.   if (not(CheckClickedStatus(gQuest))) then
  6.     if rollover(16) then
  7.       repeat while rollover(16)
  8.         AztecCursor
  9.         puppetsprite 11, true
  10.         set the locH of sprite 11 to 334
  11.         set the locV of sprite 11 to 211
  12.         updatestage
  13.         if the mousedown then
  14.           set GBeenClicked = 1
  15.         else
  16.           if gBeenClicked = 1 then
  17.             repeat while gBeenClicked = 1
  18.               Messenger
  19.             end repeat
  20.           end if
  21.         end if
  22.       end repeat
  23.       puppetsprite 11, false
  24.     else
  25.       if rollover(3) then
  26.         repeat while rollover(3)
  27.           AztecCursor
  28.           puppetsprite 12, true
  29.           set the locH of sprite 12 to 409
  30.           set the locV of sprite 12 to 219
  31.           updatestage
  32.           if the mousedown then
  33.             set GBeenClicked = 1
  34.           else
  35.             if gBeenClicked = 1 then
  36.               repeat while gBeenClicked = 1
  37.                 AnimateLoop 2, 604, 3, "SA300500.AIF", 1
  38.               end repeat
  39.             end if
  40.           end if
  41.         end repeat
  42.         set the locH of sprite 12 to 909
  43.         puppetsprite 12, false
  44.         updatestage
  45.       else
  46.         if rollover(9) then
  47.           repeat while rollover(9)
  48.             AztecCursor
  49.             puppetsprite 13, true
  50.             set the locH of sprite 13 to 413
  51.             set the locV of sprite 13 to 275
  52.             updatestage
  53.             if the mousedown then
  54.               set GBeenClicked = 1
  55.             else
  56.               if gBeenClicked = 1 then
  57.                 repeat while gBeenClicked = 1
  58.                   AnimateLoopFastPause 9, 592, 8, 0, 1, 1
  59.                 end repeat
  60.               end if
  61.             end if
  62.           end repeat
  63.           set the locH of sprite 13 to 913
  64.           puppetsprite 13, false
  65.           updatestage
  66.         else
  67.           if rollover(14) then
  68.             ArrowCursor
  69.             repeat while rollover(14)
  70.               set the locH of sprite 15 to 208
  71.               set the locV of sprite 15 to 340
  72.               updatestage
  73.             end repeat
  74.             set the locH of sprite 15 to 908
  75.             updatestage
  76.           else
  77.             if rollover(40) then
  78.               HandCursor
  79.             else
  80.               if rollover(41) then
  81.                 HandCursor
  82.               else
  83.                 if rollover(42) then
  84.                   HandCursor
  85.                 else
  86.                   ArrowCursor
  87.                 end if
  88.               end if
  89.             end if
  90.           end if
  91.         end if
  92.       end if
  93.     end if
  94.   end if
  95.   RandomQuestion(gQuest)
  96. end
  97.  
  98. on AGovtRollovers2
  99.   set gBeenClicked = 0
  100.   if (not(CheckClickedStatus(gQuest))) then
  101.     if rollover(14) then
  102.       repeat while rollover(14)
  103.         AztecCursor
  104.         if the mousedown then
  105.           set GBeenClicked = 1
  106.         else
  107.           if gBeenClicked = 1 then
  108.             repeat while gBeenClicked = 1
  109.               GovernmentAnimate
  110.             end repeat
  111.           end if
  112.         end if
  113.       end repeat
  114.     else
  115.       if rollover(8) then
  116.         ArrowCursor
  117.         repeat while rollover(8)
  118.           set the locH of sprite 9 to 328
  119.           set the locV of sprite 9 to 220
  120.           updatestage
  121.         end repeat
  122.       else
  123.         if rollover(10) then
  124.           ArrowCursor
  125.           repeat while rollover(10)
  126.             set the locH of sprite 11 to 224
  127.             set the locV of sprite 11 to 363
  128.             updatestage
  129.           end repeat
  130.           set the locH of sprite 11 to 924
  131.           updatestage
  132.         else
  133.           if rollover(12) then
  134.             ArrowCursor
  135.             repeat while rollover(12)
  136.               set the locH of sprite 13 to 392
  137.               set the locV of sprite 13 to 259
  138.               updatestage
  139.             end repeat
  140.             set the locH of sprite 13 to 992
  141.             updatestage
  142.           else
  143.             if rollover(39) then
  144.               HandCursor
  145.             else
  146.               if rollover(41) then
  147.                 HandCursor
  148.               else
  149.                 if rollover(42) then
  150.                   HandCursor
  151.                 else
  152.                   ArrowCursor
  153.                 end if
  154.               end if
  155.             end if
  156.           end if
  157.         end if
  158.       end if
  159.     end if
  160.   end if
  161.   RandomQuestion(gQuest)
  162. end
  163.  
  164. on GovernmentAnimate
  165.   ArrowCursor
  166.   set gAnimationcast1 = 612
  167.   set gAnimationcast2 = 617
  168.   set count = 0
  169.   puppetsound "SA301701.AIF"
  170.   repeat while count < 2 and (the mouseUp)
  171.     set the castnum of sprite 6 = gAnimationcast1 + 1
  172.     set the castnum of sprite 7 = gAnimationcast2 + 1
  173.     updatestage
  174.     wait .3
  175.     if (the mousedown) then 
  176.       exit repeat
  177.     end if
  178.     set the castnum of sprite 6 = gAnimationcast1 + 2
  179.     set the castnum of sprite 7 = gAnimationcast2 + 2
  180.     updatestage
  181.     if (the mousedown) then 
  182.       exit repeat
  183.     end if
  184.     wait .3
  185.     set the castnum of sprite 6 = gAnimationcast1 + 3
  186.     updatestage
  187.     if (the mousedown) then 
  188.       exit repeat
  189.     end if
  190.     wait .3
  191.     set the castnum of sprite 6 = gAnimationcast1 + 2
  192.     set the castnum of sprite 7 = gAnimationcast2
  193.     updatestage
  194.     if (the mousedown) then 
  195.       set animating = 0
  196.       exit repeat
  197.     end if
  198.     wait .3
  199.     set the castnum of sprite 6 = gAnimationcast1 + 1
  200.     updatestage
  201.     if (the mousedown) then 
  202.       exit repeat
  203.     end if
  204.     wait .3
  205.     set the castnum of sprite 6 = gAnimationcast1
  206.     updatestage
  207.     if (the mousedown) then 
  208.       exit repeat
  209.     end if
  210.     wait .3
  211.     set count = count + 1
  212.   end repeat
  213.   set the castnum of sprite 6 = gAnimationcast1
  214.   set the castnum of sprite 7 = gAnimationcast2
  215.   updatestage
  216.   sound fadeout 1, 2*60
  217.   set gBeenClicked = 0
  218. end
  219.  
  220. on Messenger
  221.   ArrowCursor
  222.   set gAnimationcast1 = 600
  223.   set count = 0
  224.   puppetsound "SA300401.AIF"
  225.   repeat while count < 1 and (the mouseUp)
  226.     set the castnum of sprite 10 = gAnimationcast1 + 1
  227.     updatestage
  228.     wait .2
  229.     if (the mousedown) then 
  230.       exit repeat
  231.     end if
  232.     set the castnum of sprite 10 = gAnimationcast1 + 2
  233.     updatestage
  234.     if (the mousedown) then 
  235.       exit repeat
  236.     end if
  237.     wait .2
  238.     set the castnum of sprite 10 = gAnimationcast1 + 3
  239.     updatestage
  240.     if (the mousedown) then 
  241.       exit repeat
  242.     end if
  243.     wait .2
  244.     set the castnum of sprite 10 = gAnimationcast1 + 2
  245.     updatestage
  246.     if (the mousedown) then 
  247.       set animating = 0
  248.       exit repeat
  249.     end if
  250.     wait .2
  251.     set the castnum of sprite 10 = gAnimationcast1 + 1
  252.     updatestage
  253.     wait .2
  254.     if (the mousedown) then 
  255.       exit repeat
  256.     end if
  257.     set the castnum of sprite 10 = gAnimationcast1 + 2
  258.     updatestage
  259.     if (the mousedown) then 
  260.       exit repeat
  261.     end if
  262.     wait .2
  263.     set the castnum of sprite 10 = gAnimationcast1 + 3
  264.     updatestage
  265.     if (the mousedown) then 
  266.       exit repeat
  267.     end if
  268.     wait .2
  269.     set the castnum of sprite 10 = gAnimationcast1 + 2
  270.     updatestage
  271.     if (the mousedown) then 
  272.       set animating = 0
  273.       exit repeat
  274.     end if
  275.     wait .2
  276.     set the castnum of sprite 10 = gAnimationcast1 + 1
  277.     updatestage
  278.     wait .2
  279.     if (the mousedown) then 
  280.       exit repeat
  281.     end if
  282.     set the castnum of sprite 10 = gAnimationcast1
  283.     updatestage
  284.     if (the mousedown) then 
  285.       exit repeat
  286.     end if
  287.     wait .5
  288.     set count = count + 1
  289.   end repeat
  290.   set the castnum of sprite 10 = gAnimationcast1
  291.   updatestage
  292.   sound fadeout 1, 2*60
  293.   set gBeenClicked = 0
  294. end
  295.  
  296.  
  297.